home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / misc / volume2 / mpg < prev    next >
Encoding:
Internet Message Format  |  1991-08-07  |  18.5 KB
  1. From: wnp@dcs.UUCP
  2. Newsgroups: comp.sources.misc
  3. Subject: v02i017: MPG - Fuel Economy Calculator
  4. Message-ID: <7128@ncoast.UUCP>
  5. Date: 26 Jan 88 03:53:00 GMT
  6. Approved: allbery@ncoast.UUCP
  7.  
  8. Comp.sources.misc: Volume 2, Issue 17
  9. Submitted-By: Wolf Paul <wnp@dcs.UUCP>
  10. Archive-Name: mpg
  11.  
  12. I hope this is useful to some of the folks out there, if only
  13. as a sample of what can be done with the UNIX shell.
  14.  
  15. Wolf Paul
  16. ihnp4!killer!wnp
  17.  
  18. -------------------
  19. #! /bin/sh
  20. # This is a shell archive, meaning:
  21. # 1. Remove everything above the #! /bin/sh line.
  22. # 2. Save the resulting text in a file.
  23. # 3. Execute the file with /bin/sh (not csh) to create the files:
  24. #    README
  25. #    eurmpg
  26. #    fpdivide.1
  27. #    fpdivide.c
  28. #    mpg.1
  29. #    mpgdata
  30. #    ukmpg
  31. #    usmpg
  32. # This archive created: Sun Jan 17 18:10:21 1988 by ihnp4!killer!wnp
  33. export PATH; PATH=/bin:$PATH
  34. if test -f 'README'
  35. then
  36.     echo shar: will not over-write existing file "'README'"
  37. else
  38. cat << \SHAR_EOF > 'README'
  39. The enclosed files are an example of a floating point application
  40. written in Bourne shell scipt, with the aid of a short program,
  41. FPDIVIDE.
  42.  
  43. FPDIVIDE will divide, multiply, add, and subtract floating point
  44. numbers, depending on its name.
  45.  
  46. The sample application enclosed is a Fuel Economy Calculator,
  47. in versions for the US, UK, and the rest of the (decimal) world.
  48.  
  49. While fuel economy is not such a hot topic in the US, I don't know
  50. of any other topic more frequently discussed when drivers of automobiles
  51. talk about their cars in Europe.
  52.  
  53. This program will let you enter the distance driven and fuel consumed
  54. every time you fill your tank, and will then tell you how many miles
  55. to the gallon you have driven, or how many liters of fuel your have
  56. consumed per 100 km driven.
  57.  
  58. It will optionally print out a short statement on the standard line printer.
  59.  
  60. With minimal modifications, this program should also run under the
  61. MKS Toolkit implementation of the Korn Shell.
  62.  
  63. FILES:
  64.  
  65. README            this file
  66. fpdivide.c        the source for the floating point commands
  67. fpdivide.1        man page for the floating point commands
  68. mpg.1            man page for the MPG programs
  69. eurmpg            European/Decimal version of MPG
  70. ukmpg            UK/Imperial Gallons version of MPG
  71. usmpg            US version of MPG
  72. mpgdata            initial $HOME/.mpgdata file, all zeros
  73.  
  74. I hope sombody finds this useful. I welcome your comments!
  75.  
  76. Wolf N. Paul
  77. ihnp4!killer!wnp
  78. ihnp4!killer!dcs!wnp
  79. ihnp4!killer!doulos!wnp
  80. SHAR_EOF
  81. fi # end of overwriting check
  82. if test -f 'eurmpg'
  83. then
  84.     echo shar: will not over-write existing file "'eurmpg'"
  85. else
  86. cat << \SHAR_EOF > 'eurmpg'
  87. :
  88. # eurmpg  (Miles Per Gallon - European Version) -- A Fuel Economy Calculator
  89. # 
  90. # This shell program uses the floating point arithmetic commands
  91. # "fp*" to calculate fuel economy in terms of liters per 100 km,
  92. # miles per US gallon, and miles per UK (Imperial) gallon.
  93. #
  94. # As distributed, the program assumes that the user will enter 
  95. # the distance travelled in KILOMETERS, and the amount of fuel used
  96. # in LITERS, but that is not difficult to change to any other
  97. # combination of volume and distance measuring units.
  98. #
  99. # Author: Wolf N. Paul (ihnp4!killer!dcs!wnp), 1/13/88
  100. # Released into the Public Domain, Jan 18, 1988
  101. #
  102. # set -v # enable debugging
  103. #
  104. # CONSTANTS:
  105. #
  106. FILE=$HOME/.mpgdata
  107. US_GALLON=3.8
  108. UK_GALLON=4.5
  109. MILE=1.6
  110. #
  111. # Variables - all initialized to 0.0
  112. C_MILES=0.0        # current miles
  113. C_KMS=0.0        # current kilometers
  114. C_USGAL=0.0        # current gallons US
  115. C_UKGAL=0.0        # current gallons UK
  116. C_LITERS=0.0    # current liters
  117. T_MILES=0.0        # total miles
  118. T_KSM=0.0        # total kilometers
  119. T_USGAL=0.0        # total gallons US
  120. T_UKGAL=0.0        # total gallons UK
  121. T_LITERS=0.0    # total liters
  122. C_USMPG=0.0        # current miles/gallon US
  123. C_UKMPG=0.0        # current miles/gallon UK
  124. C_LP100=0.0        # current liters/100 km
  125. A_USMPG=0.0    # average miles/gallon US
  126. A_UKMPG=0.0    # average miles/gallon UK
  127. A_LP100=0.0    # average liters/100 km
  128. TMP=0.0            # kms/100
  129.  
  130. echo "MPG - Fuel Economy Calculator\n"
  131. echo "European (Decimal) Version - enter Kilometers and Liters\n"
  132.  
  133. echo "Reading old values ... \c"
  134.  
  135. T_MILES=`cut -d: -f1 $FILE`
  136. T_KMS=`cut -d: -f2 $FILE`
  137. T_USGAL=`cut -d: -f3 $FILE`
  138. T_UKGAL=`cut -d: -f4 $FILE`
  139. T_LITERS=`cut -d: -f5 $FILE`
  140. echo "done!\n"
  141.  
  142. echo "Enter kilometers driven: \c"
  143. read C_KMS
  144.  
  145. echo "Enter liters used: \c"
  146. read C_LITERS
  147.  
  148. echo "\nOne moment - calculating consumption figures ... \c"
  149. C_MILES=`fpdivide $C_KMS $MILE`
  150. C_USGAL=`fpdivide $C_LITERS $US_GALLON`
  151. C_UKGAL=`fpdivide $C_LITERS $UK_GALLON`
  152.  
  153. T_MILES=`fpadd $T_MILES $C_MILES`
  154. T_KMS=`fpadd $T_KMS $C_KMS`
  155. T_USGAL=`fpadd $T_USGAL $C_USGAL`
  156. T_UKGAL=`fpadd $T_UKGAL $C_UKGAL`
  157. T_LITERS=`fpadd $T_LITERS $C_LITERS`
  158.  
  159. C_USMPG=`fpdivide $C_MILES $C_USGAL`
  160. A_USMPG=`fpdivide $T_MILES $T_USGAL`
  161.  
  162. C_UKMPG=`fpdivide $C_MILES $C_UKGAL`
  163. A_UKMPG=`fpdivide $T_MILES $T_UKGAL`
  164.  
  165. TMP=`fpdivide $C_KMS 100.00`
  166. C_LP100=`fpdivide $C_LITERS $TMP`
  167. TMP=`fpdivide $T_KMS 100.00`
  168. A_LP100=`fpdivide $T_LITERS $TMP`
  169.  
  170. echo "$T_MILES:$T_KMS:$T_USGAL:$T_UKGAL:$T_LITERS" > $FILE
  171.  
  172. echo "done!"
  173. echo "\nFuel Economy:\n"
  174. echo "\t$C_LP100 liters per 100 km\t\t(Average ${A_LP100})"
  175. echo "\t$C_UKMPG miles per UK gallon\t(Average ${A_UKMPG})"
  176. echo "\t$C_USMPG miles per US gallon\t(Average ${A_USMPG})"
  177. echo "\nDo you want a printout of these results? \c"
  178. read REPLY
  179. if [ "$REPLY" != "y" -a "$REPLY" != "Y" ] ; then
  180.     exit
  181. fi
  182. echo "
  183. MPG (Eur) -- Fuel Economy Calculator
  184. Fuel Economy Statement as of `date '+%h %d, 19%y'`
  185.  
  186. Kilometers this Filling:   $C_KMS\t($C_MILES miles)
  187. Liters this Filling:       $C_LITERS\t($C_USGAL US, $C_UKGAL UK)
  188.  
  189. Total Kilometers so far:   $T_KMS\t($T_MILES miles)
  190. Total Liters so far:       $T_LITERS\t($T_USGAL US, $T_UKGAL UK)
  191.  
  192. Current Liters per 100 km: $C_LP100\t($C_USMPG US, $C_UKMPG UK)
  193. Average Liters per 100 km: $A_LP100\t($A_USMPG US, $A_UKMPG UK)\
  194. " | lp -s &
  195. SHAR_EOF
  196. fi # end of overwriting check
  197. if test -f 'fpdivide.1'
  198. then
  199.     echo shar: will not over-write existing file "'fpdivide.1'"
  200. else
  201. cat << \SHAR_EOF > 'fpdivide.1'
  202. .TH FPDIVIDE 1L Local
  203. .SH NAME
  204. fpdivide, fpmultiply, fpadd, fpsubtract \-
  205. floating point math programs for shell scripts
  206. .SH SYNOPSIS
  207. fpdivide
  208. .I num1 num2
  209. # performs the division
  210. .I num1 / num2
  211.  
  212. fpmultiply
  213. .I num1 num2
  214. # performs the multiplication
  215. .I num1 * num2
  216.  
  217. fpadd
  218. .I num1 num2
  219. # performs the addition
  220. .I num1 + num2
  221.  
  222. fpsubtract
  223. .I num1 num2
  224. # performs the subtraction
  225. .I num1 - num2
  226.  
  227. .SH DESCRIPTION
  228. These commands, which are really links to the same program, perform
  229. the floating point arithmetical operations as listed above, and print
  230. their result (with a precision of two decimal digits) on the standard
  231. output.
  232.  
  233. They are designed to add simple floating point arithmetic to Bourne and
  234. Korn shell scripts.
  235.  
  236. .SH INSTALLATION
  237. Compile the source file,
  238. .I fpdivide.c,
  239. copy the resulting executable into your local
  240. .I bin
  241. directory, and make additional links
  242. .I fpmultiply, fpadd,
  243. and
  244. .I fpsubtract
  245. to the same binary.
  246.  
  247. .SH AUTHOR
  248. Wolf N. Paul, ihnp4!killer!dcs!wnp
  249. .br
  250. Released into the Public Domain, Jan 18, 1988
  251.  
  252. SHAR_EOF
  253. fi # end of overwriting check
  254. if test -f 'fpdivide.c'
  255. then
  256.     echo shar: will not over-write existing file "'fpdivide.c'"
  257. else
  258. cat << \SHAR_EOF > 'fpdivide.c'
  259. /* fpdivide.c - floating point math program
  260.  *
  261.  * The program's action depends on its name:
  262.  *
  263.  * fpdivide        divide two floating point numbers
  264.  * fpmultiply    multiply two floating point numbers
  265.  * fpadd        add two floating point numbers
  266.  * fpsubtract    subtract two floating point numbers
  267.  *
  268.  * In any case, the program takes two arguments and prints its result
  269.  * to the standard output.
  270.  *
  271.  * The program was written to add floating point arithmetic to shell programs.
  272.  *
  273.  * Author: Wolf N. Paul, ihnp4!killer!dcs
  274.  * 
  275.  * Released into the Public Domain, Jan 18, 1988
  276.  */
  277.  
  278. #include <stdio.h>
  279.  
  280.  
  281. char *basename(s)
  282. char *s;
  283. {
  284.     char *base;
  285.     char *strrchr();
  286.  
  287.     if ( ( base = strrchr(s, '/')) != NULL)
  288.         return(&base[1]);
  289.     return(s);
  290. }
  291.  
  292.  
  293. main(argc, argv)
  294. int argc;
  295. char **argv;
  296. {
  297.     int division, multiplication, addition, subtraction;
  298.     char *progname;
  299.     char *basename();
  300.     float dividend, divisor, quotient;
  301.     float factor1, factor2, product;
  302.     float num1, num2, sum;
  303.     float atof();
  304.  
  305.     progname = basename(argv[0]);
  306.  
  307.     if ( strcmp(progname, "fpdivide") == 0 )
  308.         division = 1;
  309.     else if ( strcmp(progname, "fpmultiply") == 0 )
  310.         multiplication = 1;
  311.     else if ( strcmp(progname, "fpadd") == 0 )
  312.         addition = 1;
  313.     else if ( strcmp(progname, "fpsubtract") == 0)
  314.         subtraction = 1;
  315.  
  316.     if ( argc != 3 )
  317.     {
  318.         if ( division )
  319.             fprintf(stderr,"Usage: %s dividend divisor\n\n", progname);
  320.         else if ( multiplication )
  321.             fprintf(stderr,"Usage: %s factor1 factor2\n\n", progname);
  322.         else if ( addition || subtraction)
  323.             fprintf(stderr,"Usage: %s num1 num1\n\n", progname);
  324.         exit(-1);
  325.     }
  326.  
  327.     if ( division )
  328.     {
  329.         dividend = atof(argv[1]);
  330.         divisor  = atof(argv[2]);
  331.         if ( divisor <= 0.0 )
  332.         {
  333.             fprintf(stderr,"%s: divisor is zero or less.\n",
  334.                     argv[0]);
  335.             exit(-2);
  336.         }
  337.         quotient = dividend / divisor;
  338.         fprintf(stdout,"%.2f\n", quotient);
  339.     }
  340.     else if ( multiplication )
  341.     {
  342.         factor1 = atof(argv[1]);
  343.         factor2 = atof(argv[2]);
  344.         product = factor1 * factor2;
  345.         fprintf(stdout,"%.2f\n", product);
  346.     }
  347.     else if ( addition || subtraction )
  348.     {
  349.         num1 = atof(argv[1]);
  350.         num2 = atof(argv[2]);
  351.         if ( addition ) sum = num1 + num2;
  352.         else if ( subtraction ) sum = num1 - num2;
  353.         fprintf(stdout,"%.2f\n", sum);
  354.     }
  355. }
  356. SHAR_EOF
  357. fi # end of overwriting check
  358. if test -f 'mpg.1'
  359. then
  360.     echo shar: will not over-write existing file "'mpg.1'"
  361. else
  362. cat << \SHAR_EOF > 'mpg.1'
  363. .TH MPG 1L Local
  364. .SH NAME
  365. mpg, usmpg, ukmpg, eurmpg \- Miles Per Gallon, A Fuel Economy Calculator
  366. .SH SYNOPSIS
  367. mpg
  368. .SH DESCRIPTION
  369. .B Mpg
  370. is a
  371. .I fuel economy calculator,
  372. i.e. it calculates fuel consumption statistics for a motor vehicle.
  373.  
  374. The program displays its results on the terminal screen, and optionally
  375. will produce a short statement on the standard line printer.
  376.  
  377. There are three versions of the program, based on the fact that there are
  378. three (or rather, two and one half) systems of measurement commonly used
  379. to measure distance travelled and fuel consumed.
  380.  
  381. .B USMPG
  382. is the American version of the program, requesting input in miles and 
  383. US gallons.
  384.  
  385. .B UKMPG
  386. is the British version of the program, requesting input in miles and Imperial
  387. gallons. Obviously, it is useful anywhere where this combination of
  388. measurements is used.
  389.  
  390. .B EURMPG
  391. is the European or Decimal version of the program, requesting input in
  392. kilometers and liters. It is useful wherever the metric system has been fully
  393. implemented.
  394.  
  395. All three versions of the program print their results both for the current
  396. tank filling, and for the average from the first time a particular user
  397. used the program (old data for this purpose is kept in a file in the user's
  398. home directory.
  399.  
  400. All three versions print their results in three different formats:
  401. .nf
  402.  
  403. -  Miles per US Gallon
  404. -  Miles per Imperial Gallon
  405. -  Liters per 100 Kilometers
  406.  
  407. .fi
  408. which to my knowledge covers all common conventions to measure fuel efficiency.
  409.  
  410. The datafile $HOME/.mpgdata contains the total figures since the first time
  411. a particular user used the program, in the form of a single line of text.
  412. This line consists of five colon-delimited fields which contain the total miles,
  413. kilometers, US gallons, UK gallons, and liters. Here is a sample of the
  414. $HOME/.mpgdata file:
  415.  
  416. .nf
  417.     598.35:957.36:21.50:18.15:81.71
  418.        |      |     |     |     |
  419.     miles     |  US Gall. |   Liters
  420.          kilometers     UK Gall.
  421. .fi
  422. .SH INSTALLATION
  423. Make sure the floating point arithmetic commands (fpdivide.1) are available.
  424. Copy the shell scripts for the three versions to your local bin directory,
  425. and make an additional link
  426. .I mpg
  427. to the version you will most frequently use.
  428. Copy the file
  429. .I mpgdata
  430. to $HOME/.mpgdata for every user who will use the program.
  431. The file is compatible with all versions of the program, so the versions can
  432. be used alternatively with no modification to #HOME/.mpgdata necessary.
  433. .SH FILES
  434. $HOME/.mpgdata    the datafile
  435. .SH AUTHOR
  436. Wolf N. Paul (ihnp4!killer!wnp)
  437. .br
  438. Released to the Public Domain Jan 18, 1988
  439. SHAR_EOF
  440. fi # end of overwriting check
  441. if test -f 'mpgdata'
  442. then
  443.     echo shar: will not over-write existing file "'mpgdata'"
  444. else
  445. cat << \SHAR_EOF > 'mpgdata'
  446. 0.0:0.0:0.0:0.0:0.0
  447. SHAR_EOF
  448. fi # end of overwriting check
  449. if test -f 'ukmpg'
  450. then
  451.     echo shar: will not over-write existing file "'ukmpg'"
  452. else
  453. cat << \SHAR_EOF > 'ukmpg'
  454. :
  455. # ukmpg  (Miles Per Gallon -- UK Version) -- A Fuel Economy Calculator
  456. # 
  457. # This shell program uses the floating point arithmetic commands
  458. # "fp*" to calculate fuel economy in terms of liters per 100 km,
  459. # miles per US gallon, and miles per UK (Imperial) gallon.
  460. #
  461. # As distributed, the program assumes that the user will enter 
  462. # the distance travelled in MILES, and the amount of fuel used
  463. # in UK GALLONS, but that is not difficult to change to any other
  464. # combination of volume and distance measuring units.
  465. #
  466. # Author: Wolf N. Paul (ihnp4!killer!dcs!wnp), 1/13/88
  467. # Released into the Public Domain, Jan 18, 1988
  468. #
  469. # set -v # enable debugging
  470. #
  471. # CONSTANTS:
  472. #
  473. FILE=$HOME/.mpgdata
  474. US_GALLON=3.8
  475. UK_GALLON=4.5
  476. MILE=1.6
  477. #
  478. # Variables - all initialized to 0.0
  479. C_MILES=0.0        # current miles
  480. C_KMS=0.0        # current kilometers
  481. C_USGAL=0.0        # current gallons US
  482. C_UKGAL=0.0        # current gallons UK
  483. C_LITERS=0.0    # current liters
  484. T_MILES=0.0        # total miles
  485. T_KSM=0.0        # total kilometers
  486. T_USGAL=0.0        # total gallons US
  487. T_UKGAL=0.0        # total gallons UK
  488. T_LITERS=0.0    # total liters
  489. C_USMPG=0.0        # current miles/gallon US
  490. C_UKMPG=0.0        # current miles/gallon UK
  491. C_LP100=0.0        # current liters/100 km
  492. A_USMPG=0.0    # average miles/gallon US
  493. A_UKMPG=0.0    # average miles/gallon UK
  494. A_LP100=0.0    # average liters/100 km
  495. TMP=0.0            # kms/100
  496.  
  497. echo "MPG - Fuel Economy Calculator\n"
  498. echo "UK Version - enter Miles and Imperial Gallons\n"
  499.  
  500. echo "Reading old values ... \c"
  501.  
  502. T_MILES=`cut -d: -f1 $FILE`
  503. T_KMS=`cut -d: -f2 $FILE`
  504. T_USGAL=`cut -d: -f3 $FILE`
  505. T_UKGAL=`cut -d: -f4 $FILE`
  506. T_LITERS=`cut -d: -f5 $FILE`
  507. echo "done!\n"
  508.  
  509. echo "Enter miles driven: \c"
  510. read C_MILES
  511.  
  512. echo "Enter gallons used: \c"
  513. read C_UKGAL
  514.  
  515. echo "\nOne moment - calculating consumption figures ... \c"
  516. C_KMS=`fpmultiply $C_MILES $MILE`
  517. C_LITERS=`fpmultiply $C_UKGAL $UK_GALLON`
  518. C_USGAL=`fpdivide $C_LITERS $US_GALLON`
  519.  
  520. T_MILES=`fpadd $T_MILES $C_MILES`
  521. T_KMS=`fpadd $T_KMS $C_KMS`
  522. T_USGAL=`fpadd $T_USGAL $C_USGAL`
  523. T_UKGAL=`fpadd $T_UKGAL $C_UKGAL`
  524. T_LITERS=`fpadd $T_LITERS $C_LITERS`
  525.  
  526. C_USMPG=`fpdivide $C_MILES $C_USGAL`
  527. A_USMPG=`fpdivide $T_MILES $T_USGAL`
  528.  
  529. C_UKMPG=`fpdivide $C_MILES $C_UKGAL`
  530. A_UKMPG=`fpdivide $T_MILES $T_UKGAL`
  531.  
  532. TMP=`fpdivide $C_KMS 100.00`
  533. C_LP100=`fpdivide $C_LITERS $TMP`
  534. TMP=`fpdivide $T_KMS 100.00`
  535. A_LP100=`fpdivide $T_LITERS $TMP`
  536.  
  537. echo "$T_MILES:$T_KMS:$T_USGAL:$T_UKGAL:$T_LITERS" > $FILE
  538.  
  539. echo "done!"
  540. echo "\nFuel Economy:\n"
  541. echo "\t$C_UKMPG miles per UK gallon\t(Average ${A_UKMPG})"
  542. echo "\t$C_USMPG miles per US gallon\t(Average ${A_USMPG})"
  543. echo "\t$C_LP100 liters per 100 km\t\t(Average ${A_LP100})"
  544. echo "\nDo you want a printout of these results? \c"
  545. read REPLY
  546. if [ "$REPLY" != "y" -a "$REPLY" != "Y" ] ; then
  547.     exit
  548. fi
  549. echo "
  550. MPG (UK) -- Fuel Economy Calculator
  551. Fuel Economy Statement as of `date '+%h %d, 19%y'`
  552.  
  553. Miles this Filling:        $C_MILES\t($C_KMS km)
  554. Gallons this Filling:      $C_UKGAL\t($C_USGAL US, $C_LITERS liters)
  555.  
  556. Total Miles so far:        $T_MILES\t($T_KMS km)
  557. Total Gallons so far:      $T_UKGAL\t($T_USGAL US, $T_LITERS liters)
  558.  
  559. Current Miles per Gallon:  $C_UKMPG\t($C_USMPG US, $C_LP100 L/100 km)
  560. Average Miles per Gallon:  $A_UKMPG\t($A_USMPG US, $A_LP100 L/100 km)\
  561. " | lp -s &
  562. SHAR_EOF
  563. fi # end of overwriting check
  564. if test -f 'usmpg'
  565. then
  566.     echo shar: will not over-write existing file "'usmpg'"
  567. else
  568. cat << \SHAR_EOF > 'usmpg'
  569. :
  570. # usmpg  (Miles Per Gallon -- US Version) -- A Fuel Economy Calculator
  571. # 
  572. # This shell program uses the floating point arithmetic commands
  573. # "fp*" to calculate fuel economy in terms of liters per 100 km,
  574. # miles per US gallon, and miles per UK (Imperial) gallon.
  575. #
  576. # As distributed, the program assumes that the user will enter 
  577. # the distance travelled in MILES, and the amount of fuel used
  578. # in US GALLONS, but that is not difficult to change to any other
  579. # combination of volume and distance measuring units.
  580. #
  581. # Author: Wolf N. Paul (ihnp4!killer!dcs!wnp), 1/13/88
  582. # Released into the Public Domain, Jan 18, 1988
  583. #
  584. # set -v # enable debugging
  585. #
  586. # CONSTANTS:
  587. #
  588. FILE=$HOME/.mpgdata
  589. US_GALLON=3.8
  590. UK_GALLON=4.5
  591. MILE=1.6
  592. #
  593. # Variables - all initialized to 0.0
  594. C_MILES=0.0        # current miles
  595. C_KMS=0.0        # current kilometers
  596. C_USGAL=0.0        # current gallons US
  597. C_UKGAL=0.0        # current gallons UK
  598. C_LITERS=0.0    # current liters
  599. T_MILES=0.0        # total miles
  600. T_KSM=0.0        # total kilometers
  601. T_USGAL=0.0        # total gallons US
  602. T_UKGAL=0.0        # total gallons UK
  603. T_LITERS=0.0    # total liters
  604. C_USMPG=0.0        # current miles/gallon US
  605. C_UKMPG=0.0        # current miles/gallon UK
  606. C_LP100=0.0        # current liters/100 km
  607. A_USMPG=0.0    # average miles/gallon US
  608. A_UKMPG=0.0    # average miles/gallon UK
  609. A_LP100=0.0    # average liters/100 km
  610. TMP=0.0            # kms/100
  611.  
  612. echo "MPG - Fuel Economy Calculator\n"
  613. echo "US Version - Enter Miles and US Gallons\n"
  614.  
  615. echo "Reading old values ... \c"
  616.  
  617. T_MILES=`cut -d: -f1 $FILE`
  618. T_KMS=`cut -d: -f2 $FILE`
  619. T_USGAL=`cut -d: -f3 $FILE`
  620. T_UKGAL=`cut -d: -f4 $FILE`
  621. T_LITERS=`cut -d: -f5 $FILE`
  622. echo "done!\n"
  623.  
  624. echo "Enter miles driven: \c"
  625. read C_MILES
  626.  
  627. echo "Enter gallons used: \c"
  628. read C_USGAL
  629.  
  630. echo "\nOne moment - calculating consumption figures ... \c"
  631. C_KMS=`fpmultiply $C_MILES $MILE`
  632. C_LITERS=`fpmultiply $C_USGAL $US_GALLON`
  633. C_UKGAL=`fpdivide $C_LITERS $UK_GALLON`
  634.  
  635. T_MILES=`fpadd $T_MILES $C_MILES`
  636. T_KMS=`fpadd $T_KMS $C_KMS`
  637. T_USGAL=`fpadd $T_USGAL $C_USGAL`
  638. T_UKGAL=`fpadd $T_UKGAL $C_UKGAL`
  639. T_LITERS=`fpadd $T_LITERS $C_LITERS`
  640.  
  641. C_USMPG=`fpdivide $C_MILES $C_USGAL`
  642. A_USMPG=`fpdivide $T_MILES $T_USGAL`
  643.  
  644. C_UKMPG=`fpdivide $C_MILES $C_UKGAL`
  645. A_UKMPG=`fpdivide $T_MILES $T_UKGAL`
  646.  
  647. TMP=`fpdivide $C_KMS 100.00`
  648. C_LP100=`fpdivide $C_LITERS $TMP`
  649. TMP=`fpdivide $T_KMS 100.00`
  650. A_LP100=`fpdivide $T_LITERS $TMP`
  651.  
  652. echo "$T_MILES:$T_KMS:$T_USGAL:$T_UKGAL:$T_LITERS" > $FILE
  653.  
  654. echo "done!"
  655. echo "\nFuel Economy:\n"
  656. echo "\t$C_USMPG miles per US gallon\t(Average ${A_USMPG})"
  657. echo "\t$C_UKMPG miles per UK gallon\t(Average ${A_UKMPG})"
  658. echo "\t$C_LP100 liters per 100 km\t\t(Average ${A_LP100})"
  659. echo "\nDo you want a printout of these results? \c"
  660. read REPLY
  661. if [ "$REPLY" != "y" -a "$REPLY" != "Y" ] ; then
  662.     exit
  663. fi
  664. echo "
  665. MPG (US) -- Fuel Economy Calculator
  666. Fuel Economy Statement as of `date '+%h %d, 19%y'`
  667.  
  668. Miles this Filling:        $C_MILES\t($C_KMS km)
  669. Gallons this Filling:      $C_USGAL\t($C_UKGAL UK, $C_LITERS liters)
  670.  
  671. Total Miles so far:        $T_MILES\t($T_KMS km)
  672. Total Gallons so far:      $T_USGAL\t($T_UKGAL UK, $T_LITERS liters)
  673.  
  674. Current Miles per Gallon:  $C_USMPG\t($C_UKMPG UK, $C_LP100 l/100 km)
  675. Average Miles per Gallon:  $A_USMPG\t($A_UKMPG UK, $A_LP100 l/100 km)\
  676. " | lp -s &
  677. SHAR_EOF
  678. chmod +x 'usmpg'
  679. fi # end of overwriting check
  680. #    End of shell archive
  681. exit 0
  682.